Imports Sys = System

Namespace Enhancements.Core
    ''' <summary>The exception that is thrown when a XML is not well-formed.</summary>
    <DebuggerStepThrough()> _
    Public NotInheritable Class IsXmlWellFormedNotException
        Inherits AssertException

        Friend Sub New(ByVal _objectName As System.String, ByVal _object() As System.Byte)
            MyBase.New(_objectName)
            [Object] = _object
        End Sub

        Private __Object() As System.Byte = CType(Sys.Array.CreateInstance(GetType(Byte), 0), Byte())
        ''' <summary>Gets the value of the object that caused this exception.</summary>
        Public Property [Object]() As System.Byte()
            Get
                Return __Object
            End Get
            Private Set(ByVal _value() As System.Byte)
                __Object = _value
            End Set
        End Property

    End Class
End Namespace
